home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 February / EnigmA AMIGA RUN 04 (1996)(G.R. Edizioni)(IT)[!][issue 1996-02][Skylink CD III].iso / earcd / patches / ds1r3.lha / 1.0r3Update / Install-Datastore1.0r3 < prev    next >
Text File  |  1995-03-08  |  1KB  |  39 lines
  1. ;DATASTORE 1.0r3 ONLINE UPDATE PATCH INSTALLATION SCRIPT
  2. ;COPYRIGHT ©1995 DIGITA INTERNATIONAL AND SOFT-LOGIK PUBLISHING CORPORATION
  3.  
  4. (message "\n\nThis will update your hard drive installation of Datastore 1.0 release 2 to 1.0 release 3 (1.0r3). It requires that Datastore 1.0r2 be installed on your hard drive.\n\nYour original Datastore disk will not be modified by this update.")
  5.  
  6. ;GET DATASTORE DIRECTORY
  7. (set DSdest
  8.     (askdir
  9.         (prompt
  10.             "Where is Datastore installed?\n "
  11.             "Click on the Datastore drawer.\n")
  12.                 (help
  13.             "\n\nYou must select the Datastore drawer so that "
  14.             "this installer can update the installation.")
  15.                 (default @default-dest)
  16.         )
  17. )
  18. (set temp1 (tackon DSdest "DSProg"))
  19. (set temp2 (tackon DSdest "Datastore"))
  20. (if (AND (<> (exists temp1) 1) (<> (exists temp2) 1))
  21.     (abort "Datastore 1.0r2 is not located in this directory.")
  22. )
  23. (set @default-dest DSdest)
  24. (makeassign "Datastore" DSdest (safe))
  25.  
  26. ;UPDATE DATASTORE
  27. (working "\n\nPatching Datastore 1.0r2 to 1.0r3...")
  28. (run "spatch >NIL: <NIL: -oDatastore:DSProg1.0r3 -pDSProg.patch Datastore:DSProg")
  29. (if (exists "Datastore:DSProg1.0r3")
  30.     (
  31.         (delete "Datastore:DSProg")
  32.         (rename "Datastore:DSProg1.0r3" "Datastore:DSProg")
  33.     )
  34.     (abort "Patch was not successful. DSprog file could not be patched due to incorrect version, lack of hard drive space, or RAM.")
  35. )
  36.  
  37. ;GEE, THAT WAS FUN
  38. (exit "Datastore updated to version 1.0r3!")
  39.